// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}


0000: NOP



WHILE TRUE
    WAIT 0
    Actor.StorePos($PLAYER_ACTOR, 10@, 11@, 12@)
if 0AE1: 20@ = random_actor_near_point 10@ 11@ 12@ in_radius 100.0 find_next 1 pass_deads 0 //IF and SET
then                                                                                                                                                                  
    IF NOT 20@ == -1                                                                                                                                                   
    then                                                                                                                                            
        IF 056D:   actor 20@ defined                                                                                                                                   
        then
            repeat
            wait 0
            
            FOR 0@ = 0 TO 10 STEP 1
            IF 056D:   actor 20@ defined
            JF BREAK                                                                            
            Actor.StorePos(20@, 7@, 8@, 9@)                                                   
            04C4: store_coords_to 1@ 2@ 3@ from_actor $PLAYER_ACTOR with_offset 0.0 2.0 -1.0 
            06BC: create_M4_shoot_from 1@ 2@ 3@ target 7@ 7@ 8@ energy 1 
            04D5: create_corona_at 1@ 2@ 3@ radius 0.1 type 2 flare 1 RGB 0 200 0
            2@ += 0.5
            WAIT 0
            END 
            until actor.Dead(20@)
            0ACA: "~Y~~H~ANEMY FINISH" 
            END_THREAD
        end                                                             
    end
end
END